home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 12 / Mac Magazin and MacEasy Magazine CD - Issue 12.iso / CD Extras / Plug-ins / QuarkXPress / XChange International demos / Smart XT / Smart XT 2.0 Demo.1 / Smart XT 2.0 Demo.1.rsrc / PSCD_138 < prev    next >
Text File  |  1994-08-10  |  2KB  |  87 lines
  1. /image2 level2 {/image load def} {{begin
  2. Width Height BitsPerComponent ImageMatrix
  3. Decode length 2 eq
  4. {/DataSource load image} if
  5. Decode length 6 eq
  6. {DataSource 0 get DataSource 1 get DataSource 2 get
  7. true 3 colorimage} if
  8. Decode length 8 eq
  9. {DataSource 0 get DataSource 1 get
  10. DataSource 2 get DataSource 3 get
  11. true 4 colorimage} if
  12. end} def} ifelse
  13. /_image2 level2 {/_image load def} {{begin
  14. Width Height BitsPerComponent ImageMatrix
  15. /DataSource load _image end} def} ifelse
  16. /beginimage {
  17. band 0 eq band 5 eq or
  18. {image2} if
  19. band 1 ge band 4 le and
  20. {{1 exch sub dummy exec} dup 3 _currenttransfer put
  21. _settransfer _image2} if
  22. band 6 eq
  23. {negative {{pop 0}} {{pop 1}} ifelse
  24. _settransfer _image2} if
  25. } def
  26. 12 dict begin
  27. /ImageType 1 def
  28. /Width cols def
  29. /Height rows def
  30. /ImageMatrix [cols 0 0 rows neg 0 rows] def
  31. /BitsPerComponent 8 def
  32. band 0 eq
  33. {/Decode [0 1 0 1 0 1 0 1] def}
  34. {/Decode [0 1] def} ifelse
  35. band 0 eq {
  36. /MultipleDataSources true def
  37. /DataSource [
  38. {picstr1 readdata}
  39. {picstr2 readdata}
  40. {picstr3 readdata}
  41. {picstr4 readdata picstr5 readdata pop}
  42. ] def} if
  43. band 1 eq {
  44. /DataSource {
  45. picstr1 readdata
  46. picstr2 readdata pop
  47. picstr3 readdata pop
  48. picstr4 readdata pop
  49. picstr5 readdata pop
  50. } def} if
  51. band 2 eq {
  52. /DataSource {
  53. picstr1 readdata pop
  54. picstr2 readdata
  55. picstr3 readdata pop
  56. picstr4 readdata pop
  57. picstr5 readdata pop
  58. } def} if
  59. band 3 eq {
  60. /DataSource {
  61. picstr1 readdata pop
  62. picstr2 readdata pop
  63. picstr3 readdata
  64. picstr4 readdata pop
  65. picstr5 readdata pop
  66. } def} if
  67. band 4 eq {
  68. /DataSource {
  69. picstr1 readdata pop
  70. picstr2 readdata pop
  71. picstr3 readdata pop
  72. picstr4 readdata
  73. picstr5 readdata pop
  74. } def} if
  75. band 5 ge {
  76. /DataSource {
  77. picstr1 readdata pop
  78. picstr2 readdata pop
  79. picstr3 readdata pop
  80. picstr4 readdata pop
  81. picstr5 readdata
  82. } def} if
  83. currentdict end
  84. level2 {
  85. band 0 eq {/DeviceCMYK} {/DeviceGray} ifelse
  86. setcolorspace} if
  87.